home *** CD-ROM | disk | FTP | other *** search
- AIMAG(3I) Last changed: 4-13-99
-
-
- NNAAMMEE
- AAIIMMAAGG, IIMMAAGG, DDIIMMAAGG, QQIIMMAAGG - Returns imaginary part of a complex number
-
- SSYYNNOOPPSSIISS
- AAIIMMAAGG (([ZZ==]_z))
- IIMMAAGG (([ZZ==]_z))
- DDIIMMAAGG (([ZZ==]_z))
- QQIIMMAAGG (([ZZ==]_z))
-
- IIMMPPLLEEMMEENNTTAATTIIOONN
- UNICOS, UNICOS/mk, IRIX systems
-
- CF90, MIPSpro 7 Fortran 90, MIPSpro Fortran 77
-
- SSTTAANNDDAARRDDSS
- Fortran
-
- Fortran extensions: IIMMAAGG, DDIIMMAAGG, QQIIMMAAGG
-
- DDEESSCCRRIIPPTTIIOONN
- AAIIMMAAGG, IIMMAAGG, DDIIMMAAGG, and QQIIMMAAGG return the imaginary part of a complex
- number. AAIIMMAAGG is the generic function name; the others are specifics.
- These are elemental intrinsic functions. IIMMAAGG is a nonstandard
- intrinsic elemental function and is a synonym for AAIIMMAAGG. These
- functions accept the following argument:
-
- _x Must be of type single-precision complex, double-precision
- complex, or quad-precision complex. See the RETURN VALUES
- section for information on input data types and return
- values.
-
- The data type and kind type for single-precision,
- double-precision, and quad-precision values differ depending
- on your platform. For platform-specific information, see
- the TERMINOLOGY section of the IINNTTRROO__IINNTTRRIINN(3I) man page.
-
- These functions evaluate _y = _x , where _z = _x ,_x .
- _i _r _i
- NNOOTTEESS
- The AAIIMMAAGG intrinsic function name can be passed as an argument; the
- others cannot.
-
- RREETTUURRNN VVAALLUUEESS
- AAIIMMAAGG and IIMMAAGG return the imaginary part of their complex arguments.
-
- DDIIMMAAGG returns the double-precision imaginary part of its
- double-precision complex argument.
-
- QQIIMMAAGG returns the quad-precision imaginary part of its quad-precision
- complex argument.
-
- EEXXAAMMPPLLEESS
- The following program gives the imaginary part of the complex number
- (11..00,,22..00). After running the program, RREESSUULLTT = 2.0.
-
- PROGRAM AIMTEST
- REAL RESULT
- RESULT=AIMAG( (1.0,2.0) )
- PRINT *, RESULT
- STOP
- END
-
- SSEEEE AALLSSOO
- _I_n_t_r_i_n_s_i_c _P_r_o_c_e_d_u_r_e_s _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l for the printed version of this
- man page.
-